home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Language/OS - Multiplatform Resource Library
/
LANGUAGE OS.iso
/
lisp
/
eulisp
/
feel-075.lha
/
feel0.75
/
Src
/
defs.h
< prev
next >
Wrap
C/C++ Source or Header
|
1992-07-07
|
2KB
|
88 lines
/* ******************************************************************** */
/* defs.h Copyright (C) Codemist and University of Bath 1989 */
/* */
/* Basic definitions global constants and config options */
/* ******************************************************************** */
/*
* Change Log:
* Version 1, April 1989
*/
#ifndef DEFS_H
#define DEFS_H
#ifndef TRUE
#define TRUE (1)
#define FALSE (0)
#endif
#define CONTINUABLE (2)
#define NONCONTINUABLE (3)
#define STUB(name) printf("*** stub %s called\n", name)
#define IGNORE(name) (name = name)
/* reverse a few flags */
#ifndef LOWTAGINTS
#define NOLOWTAGINTS
#endif
#ifndef DEBUG
#define NODEBUG
#endif
#ifdef MACHINE_SYSTEMV
#define MAX_PROCESSORS (10)
#endif
#ifdef MACHINE_BSD
#define MAX_PROCESSORS (1)
#endif
#ifdef MACHINE_ANY
#define MAX_PROCESSORS (1)
#endif
#ifndef MAX_PROCESSORS
"Specify one of BSD, ANY, SYSTEMV"
#endif
#define RESET_GLOBAL_STACK() /** GC_STACK_POINTER() = stacktop**/
#ifdef ALIGN8
#define BYTE_ALIGNMENT 8
#else
#define BYTE_ALIGNMENT 4
#endif
/* Configuration section */
/* Variables that we don't want to own up about
STACK_START_MISALIGNED: Clipper requires stack-pointers to be
multiples of 4, and not multiples of 8
FD_SET_PATCH_NEEDED: 4.2 BSD machine
FEEL_RC_FILE: name of initialisation file
CHECK_KEYBOARD: signals are broken, so put ^C catcher in interpret loop
*/
/* Standard values... */
#define HAS_POPEN
#define FEEL_RC_FILE "/.feelrc"
/* Machine dependant changes... */
#ifdef __clipper
#define STACK_START_MISALIGNED
#define FD_SET_PATCH_NEEDED
#endif
#ifdef msdos
#undef HAS_POPEN
#define FEEL_RC_FILE "./feel.rc"
#define CHECK_KEYBOARD 5000
#endif
#endif /* DEFS_H */
/* End of defs.h */